home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 1999 #1
/
Amiga Plus 1999 #1.iso
/
System-Boost
/
Workbench
/
MCXP337
/
Install_MUI_MCX_Prefs
< prev
next >
Wrap
Text File
|
1998-01-11
|
3KB
|
151 lines
;
; Installation script for MUI_MCX_Prefs
;
; -------------------------------------------------------------
; English strings (default)
(if (= @language "deutsch")
(
(set #msj1 "Installiere MUI_MCX_Prefs...")
(set #msj2 "Wo soll MUI_MCX_Prefs installiert werden ?")
(set #msj3 "Welche Sprachkataloge sollen installiert werden ?")
(set #msj4 "Installiere 'WBStart.library'...")
(set #msj5 "Installiere 'WBStart-Handler'...")
(set #msj6 "Installiere 'DosPath.library'...")
)
)
; German strings
(if (= @language "english")
(
(set #msj1 "Installing MUI_MCX_Prefs...")
(set #msj2 "Where shall I install MUI_MultiCX_Prefs?")
(set #msj3 "Which languages do You wish to install ?")
(set #msj4 "Install 'WBStart.library'...")
(set #msj5 "Install 'WBStart-Handler'...")
(set #msj6 "Install 'DosPath.library'...")
)
)
; Spanish strings
(if (= @language "español")
(
(set #msj1 "Instalando MUI_MCX_Prefs...")
(set #msj2 "¿Dónde desea instalar MUI_MultiCX_Prefs?")
(set #msj3 "¿Qué idioma(s) desea instalar?")
(set #msj4 "Instalando 'WBStart.library'...")
(set #msj5"Instalando 'WBStart-Handler'...")
(set #msj6 "Instalando 'DosPath.library'...")
)
)
; Galician strings
(if (= @language "galego")
(
(set #msj1 "Instalando MUI_MCX_Prefs...")
(set #msj2 "¿Onde desexa instalar MUI_MultiCX_Prefs?")
(set #msj3 "¿Qué língua(s) desexa instalar?")
(set #msj4 "Instalando 'WBStart.library'...")
(set #msj5 "Instalando 'WBStart-Handler'...")
(set #msj6 "Instalando 'DosPath.library'...")
)
)
; French strings
(if (= @language "français")
(
(set #msj1 "Je suis en train de copier MUI_MCX_Prefs...")
(set #msj2 "Oú voulez-vous copier MUI_MultiCX_Prefs?")
(set #msj3 "Quelles sont les langues à installer?")
(set #msj4 "Je suis en train de copier 'WBStart.library'...")
(set #msj5 "Je suis en train de copier 'WBStart-Handler'...")
(set #msj6 "Je suis en train de copier 'DosPath.library'...")
)
)
; Start
(transcript #msj1)
(set name
(askdir
(prompt #msj2)
(help @askdir-help)
(default "SYS:Prefs")
)
)
(copyfiles
(source "MUI_MCX_Prefs")
(infos)
(dest name)
)
(set lang
(askoptions
(prompt #msj3)
(help @askoptions-help)
(choices "deutsch")
(default def-lang)
)
)
(set n 0)
(while (set language (select n "deutsch" "" ) )
(
(if (IN lang n)
(copyfiles
(source (cat "locale/" language ".catalog" ))
(dest (cat "LOCALE:catalogs/" language ))
(newname "mcxp.catalog")
)
)
(set n (+ n 1))
))
(set vernum (getversion "intuition.library" (resident)))
(set ver (/ vernum 65536))
(if ( > ver 38)
(copylib
(prompt #msj4)
(help @copylib-help)
(source "libs/wbstart.library")
(dest "libs:")
(confirm)
)
(copylib
(prompt #msj5)
(help @copylib-help)
(source "l/WBStart-Handler")
(dest "l:")
(confirm)
)
)
(if ( > ver 38)
(copylib
(prompt #msj6)
(help @copylib-help)
(source "libs/dospath.library")
(dest "libs:")
(confirm)
)
)
(set @default-dest name)
(exit)